home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FishMarket 1.0
/
FishMarket v1.0.iso
/
fishies
/
201-225
/
disk_222
/
plplot
/
src
/
source.zoo
/
global.c
< prev
next >
Wrap
C/C++ Source or Header
|
1989-05-15
|
6KB
|
444 lines
/* Sets and gets global variables */
#include "plplot.h"
#include "declare.h"
void glev(n)
int *n;
{
*n = level;
}
void slev(n)
int n;
{
level = n;
}
void gbase(x,y,xc,yc)
float *x,*y,*xc,*yc;
{
*x = base3x;
*y = base3y;
*xc = basecx;
*yc = basecy;
}
void sbase(x,y,xc,yc)
float x,y,xc,yc;
{
base3x = x;
base3y = y;
basecx = xc;
basecy = yc;
}
void gnms(n)
int *n;
{
*n = nms;
}
void snms(n)
int n;
{
nms = n;
}
void gdev(dev,term,gra)
int *dev,*term,*gra;
{
*dev = device;
*term = termin;
*gra = graphx;
}
void sdev(dev,term,gra)
int dev,term,gra;
{
device = dev;
termin = term;
graphx = gra;
}
void gcurr(ix,iy)
int *ix,*iy;
{
*ix = currx;
*iy = curry;
}
void scurr(ix,iy)
int ix,iy;
{
currx = ix;
curry = iy;
}
void gdom(xmin,xmax,ymin,ymax)
float *xmin,*xmax,*ymin,*ymax;
{
*xmin = domxmi;
*xmax = domxma;
*ymin = domymi;
*ymax = domyma;
}
void sdom(xmin,xmax,ymin,ymax)
float xmin,xmax,ymin,ymax;
{
domxmi = xmin;
domxma = xmax;
domymi = ymin;
domyma = ymax;
}
void grange(zscl,zmin,zmax)
float *zscl,*zmin,*zmax;
{
*zscl = zzscl;
*zmin = ranmi;
*zmax = ranma;
}
void srange(zscl,zmin,zmax)
float zscl,zmin,zmax;
{
zzscl = zscl;
ranmi = zmin;
ranma = zmax;
}
void gw3wc(dxx,dxy,dyx,dyy,dyz)
float *dxx,*dxy,*dyx,*dyy,*dyz;
{
*dxx = cxx;
*dxy = cxy;
*dyx = cyx;
*dyy = cyy;
*dyz = cyz;
}
void sw3wc(dxx,dxy,dyx,dyy,dyz)
float dxx,dxy,dyx,dyy,dyz;
{
cxx = dxx;
cxy = dxy;
cyx = dyx;
cyy = dyy;
cyz = dyz;
}
void gvpp(ixmin,ixmax,iymin,iymax)
int *ixmin,*ixmax,*iymin,*iymax;
{
*ixmin = vppxmi;
*ixmax = vppxma;
*iymin = vppymi;
*iymax = vppyma;
}
void svpp(ixmin,ixmax,iymin,iymax)
int ixmin,ixmax,iymin,iymax;
{
vppxmi = ixmin;
vppxma = ixmax;
vppymi = iymin;
vppyma = iymax;
}
void gspp(ixmin,ixmax,iymin,iymax)
int *ixmin,*ixmax,*iymin,*iymax;
{
*ixmin = sppxmi;
*ixmax = sppxma;
*iymin = sppymi;
*iymax = sppyma;
}
void sspp(ixmin,ixmax,iymin,iymax)
int ixmin,ixmax,iymin,iymax;
{
sppxmi = ixmin;
sppxma = ixmax;
sppymi = iymin;
sppyma = iymax;
}
void gclp(ixmin,ixmax,iymin,iymax)
int *ixmin,*ixmax,*iymin,*iymax;
{
*ixmin = clpxmi;
*ixmax = clpxma;
*iymin = clpymi;
*iymax = clpyma;
}
void sclp(ixmin,ixmax,iymin,iymax)
int ixmin,ixmax,iymin,iymax;
{
clpxmi = ixmin;
clpxma = ixmax;
clpymi = iymin;
clpyma = iymax;
}
void gphy(ixmin,ixmax,iymin,iymax)
int *ixmin,*ixmax,*iymin,*iymax;
{
*ixmin = phyxmi;
*ixmax = phyxma;
*iymin = phyymi;
*iymax = phyyma;
}
void sphy(ixmin,ixmax,iymin,iymax)
int ixmin,ixmax,iymin,iymax;
{
phyxmi = ixmin;
phyxma = ixmax;
phyymi = iymin;
phyyma = iymax;
}
void gsub(nx,ny,cs)
int *nx,*ny,*cs;
{
*nx = nsubx;
*ny = nsuby;
*cs = cursub;
}
void ssub(nx,ny,cs)
int nx,ny,cs;
{
nsubx = nx;
nsuby = ny;
cursub = cs;
}
void gumpix(ix,iy)
int *ix,*iy;
{
*ix = umx;
*iy = umy;
}
void sumpix(ix,iy)
int ix,iy;
{
umx = ix;
umy = iy;
}
void gatt(ifnt,icol)
int *ifnt,*icol;
{
*ifnt = font;
*icol = colour;
}
void satt(ifnt,icol)
int ifnt,icol;
{
font = ifnt;
colour = icol;
}
void gspd(xmin,xmax,ymin,ymax)
float *xmin,*xmax,*ymin,*ymax;
{
*xmin = spdxmi;
*xmax = spdxma;
*ymin = spdymi;
*ymax = spdyma;
}
void sspd(xmin,xmax,ymin,ymax)
float xmin,xmax,ymin,ymax;
{
spdxmi = xmin;
spdxma = xmax;
spdymi = ymin;
spdyma = ymax;
}
void gvpd(xmin,xmax,ymin,ymax)
float *xmin,*xmax,*ymin,*ymax;
{
*xmin = vpdxmi;
*xmax = vpdxma;
*ymin = vpdymi;
*ymax = vpdyma;
}
void svpd(xmin,xmax,ymin,ymax)
float xmin,xmax,ymin,ymax;
{
vpdxmi = xmin;
vpdxma = xmax;
vpdymi = ymin;
vpdyma = ymax;
}
void gvpw(xmin,xmax,ymin,ymax)
float *xmin,*xmax,*ymin,*ymax;
{
*xmin = vpwxmi;
*xmax = vpwxma;
*ymin = vpwymi;
*ymax = vpwyma;
}
void svpw(xmin,xmax,ymin,ymax)
float xmin,xmax,ymin,ymax;
{
vpwxmi = xmin;
vpwxma = xmax;
vpwymi = ymin;
vpwyma = ymax;
}
void gpixmm(x,y)
float *x,*y;
{
*x = xpmm;
*y = ypmm;
}
void spixmm(x,y)
float x,y;
{
xpmm = x;
ypmm = y;
}
void gwp(xscl,xoff,yscl,yoff)
float *xscl,*xoff,*yscl,*yoff;
{
*xscl = wpxscl;
*xoff = wpxoff;
*yscl = wpyscl;
*yoff = wpyoff;
}
void swm(xscl,xoff,yscl,yoff)
float xscl,xoff,yscl,yoff;
{
wmxscl = xscl;
wmxoff = xoff;
wmyscl = yscl;
wmyoff = yoff;
}
void gwm(xscl,xoff,yscl,yoff)
float *xscl,*xoff,*yscl,*yoff;
{
*xscl = wmxscl;
*xoff = wmxoff;
*yscl = wmyscl;
*yoff = wmyoff;
}
void swp(xscl,xoff,yscl,yoff)
float xscl,xoff,yscl,yoff;
{
wpxscl = xscl;
wpxoff = xoff;
wpyscl = yscl;
wpyoff = yoff;
}
void gdp(xscl,xoff,yscl,yoff)
float *xscl,*xoff,*yscl,*yoff;
{
*xscl = dpxscl;
*xoff = dpxoff;
*yscl = dpyscl;
*yoff = dpyoff;
}
void sdp(xscl,xoff,yscl,yoff)
float xscl,xoff,yscl,yoff;
{
dpxscl = xscl;
dpxoff = xoff;
dpyscl = yscl;
dpyoff = yoff;
}
void gmp(xscl,xoff,yscl,yoff)
float *xscl,*xoff,*yscl,*yoff;
{
*xscl = mpxscl;
*xoff = mpxoff;
*yscl = mpyscl;
*yoff = mpyoff;
}
void smp(xscl,xoff,yscl,yoff)
float xscl,xoff,yscl,yoff;
{
mpxscl = xscl;
mpxoff = xoff;
mpyscl = yscl;
mpyoff = yoff;
}
void gchr(def,ht)
float *def,*ht;
{
*def = chrdef;
*ht = chrht;
}
void schr(def,ht)
float def,ht;
{
chrdef = def;
chrht = ht;
}
void gsym(def,ht)
float *def,*ht;
{
*def = symdef;
*ht = symht;
}
void ssym(def,ht)
float def,ht;
{
symdef = def;
symht = ht;
}
void gmaj(def,ht)
float *def,*ht;
{
*def = majdef;
*ht = majht;
}
void smaj(def,ht)
float def,ht;
{
majdef = def;
majht = ht;
}
void gmin(def,ht)
float *def,*ht;
{
*def = mindef;
*ht = minht;
}
void smin(def,ht)
float def,ht;
{
mindef = def;
minht = ht;
}